speed Infinity

write "CATCH THE TURTLE!"
write( "Click the turtle to grab it" )

pen black, 5

# Move turtle forever
forever 10, ->
  fd random 10
  rt random 5

# Distance formula
dist = (x1, y1, x2, y2) ->
  dx = x2 - x1
  dy = y2 - y1
  Math.sqrt( dx * dx + dy * dy )

click (e) ->
  # Get turtle position
  t = getxy()
  
  # Get distance between mouse and turtle  
  distance = dist( e.x, e.y, t[0], t[1] )
  
  # Within 10 pixels?
  if distance < 10
    write "CLICK!"
    dot red, 25


read "TEXT", (input) ->
  result = input.match /[a-z]*/
  write "RESULT: [" + result + "]"
  write "INPUT: " + input
  if result != ""
    write "MATCH"
  else
    write "FAIL"